home *** CD-ROM | disk | FTP | other *** search
/ Aminet 22 / Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso / Aminet / game / role / alan.lha / jungle.alan < prev    next >
Text File  |  1997-01-08  |  8KB  |  244 lines
  1. -- This is an example of an adventure written in ALAN using almost
  2. -- nothing of the more advanced features.
  3.  
  4. -- The story is not much: You have lost your memory and stumble around
  5. -- on a narrow path in the middle of the jungle. To the north the path
  6. -- takes you to a river and to the south to a clearing where a tiger 
  7. -- blocks your way. The only way to get past the tiger is to eat a
  8. -- certain kind of fungus, which works as tiger repellant (a clue about
  9. -- this can be found in your notebook). The fungus can only be found
  10. -- by climbing the vine hanging down over the path. When you have
  11. -- succeded in getting past the tiger the game gets to a happy ending.
  12.  
  13. -------------
  14. LOCATION Path
  15. -------------
  16.     DESCRIPTION
  17.     "You are standing on a barely visible path in the middle of nowhere.
  18.     The path looks like it's been walked by bare feet (or rather paws) for
  19.     many a year. From the small amount of light reaching the ground here
  20.     I should say the path runs in almost straight north/south direction.
  21.     On both sides of the path is the deepest, darkest jungle you've ever
  22.     seen. I really wouldn't recommend going that way. The path itself 
  23.     isn't much of a place to hold on to either. You get the impression
  24.     that the vegetation is trying hard to recapture even this tiny part
  25.     of land. The trees on both sides seems to come closer and there are
  26.     vines hanging down almost touching your head."
  27.     
  28.     EXIT north TO bank.
  29.     EXIT south TO clearing.
  30.     EXIT east, west TO jungle.
  31. END LOCATION.
  32.  
  33. -------------
  34. LOCATION Bank
  35. -------------
  36.     DESCRIPTION
  37.     "The path ends here on the south side of a wide river. On the ground
  38.     you can see lots of paw prints (some pretty big ones, too). The obvious
  39.     guess is naturally that this is a common place for the wild animals to
  40.     stop by for a drink or two (and maybe a bite too). The river itself
  41.     doesn't seem to be too dangerous - it's neither too wide nor too rapid -
  42.     but those logs with a pair of eyes give you second thoughts."
  43.  
  44.  
  45.     EXIT north, swim TO river.
  46.     EXIT south TO path.
  47.     EXIT east, west TO jungle.
  48. END LOCATION.
  49.  
  50. --------------
  51. LOCATION Trees
  52. --------------
  53.     DESCRIPTION
  54.     "You have now ended up high above the ground in the middle of the
  55.     trees and vines. The vegetation is so thick up here that it seems
  56.     almost like a green floor."
  57.  
  58.     EXIT down TO path.
  59. END LOCATION.
  60.  
  61. --------------
  62. LOCATION River
  63. --------------
  64.     DESCRIPTION
  65.     "Defying the obvious horrors of the river you try for the northern
  66.     river bank. One crocodile immediately chops your left foot of, but
  67.     you makes it almost to the middle of the river before another merciful
  68.     crocodile finish you off."
  69.     QUIT.
  70.  
  71. END LOCATION. 
  72.    
  73. -----------------
  74. LOCATION Clearing
  75. -----------------
  76.     DESCRIPTION
  77.     "Here the jungle opens up a bit and the path takes you straight into
  78.     a clearing. The path seems to continue on the south side of the
  79.     clearing some fifty paces away."
  80.  
  81.     EXIT north TO path.
  82.     EXIT east, west TO jungle.
  83.     EXIT south TO camp
  84.         CHECK hero IS repelling
  85.         ELSE "The tiger opens its big mouth and lets out a terrifying
  86.             growl. Apparently it won't let you pass."
  87.         DOES
  88.             "When you approaches the tiger it looks confused. Then it
  89.             really takes in your smell. It suddenly bolts, turns and
  90.             takes off into the jungle."
  91.             LOCATE tiger AT nowhere.
  92.     END EXIT.
  93. END LOCATION.
  94.  
  95. ---------------
  96. LOCATION Jungle
  97. ---------------
  98.     DESCRIPTION 
  99.     "Now you've really done it. Didn't I tell you NOT to enter the jungle."
  100.     
  101.     EXIT north, south, east, west TO jungle DOES
  102.         "Stumbling around in the jungle trying to make your way through
  103.         the damp vegetation that almost seems to reach out for you,
  104.         you suddenly stumble onto a snake, which disapprove very clearly
  105.         of you stepping on it. One bite in the leg and you have had it."
  106.         QUIT.
  107.     END EXIT.
  108. END LOCATION.
  109.  
  110. -------------
  111. LOCATION Camp
  112. -------------
  113.     DESCRIPTION
  114.         "Here is the scattered parts of what ones was the camp of your
  115.         expedition. The sight of it makes your memory come back. When
  116.         you were attacked last night of a herd of wild elephants everyone
  117.         fled in panic. You yourself ran straight into a tree and must
  118.         have lost both conciousness and memory. 'Well, hope the computer
  119.         still works.' you think. 'I think I stick to computer adventures,
  120.         at least for the immediate future.'"
  121.     QUIT.
  122. END LOCATION.
  123.         
  124. ----------------
  125. LOCATION nowhere
  126. ----------------
  127. -- The location for disappering objects.
  128. END LOCATION.
  129.  
  130. -----------------------------------------------------------------------------
  131.  
  132. OBJECT Tiger AT Clearing
  133.     DESCRIPTION
  134.         "An enormous tiger is standing here blocking your way."
  135. END OBJECT.
  136.  
  137. OBJECT Notebook IN inventory
  138.     DESCRIPTION
  139.         "The book is called 'The Jungle Book: Tricks and Tips'. It
  140.         also has your name on it."
  141.  
  142.     VERB Take DOES
  143.         LOCATE OBJECT IN inventory.
  144.         "Taken!"
  145.     END VERB.
  146.  
  147.     VERB Drop DOES
  148.         LOCATE OBJECT HERE.
  149.         "Dropped!"
  150.     END VERB.
  151.  
  152.     VERB Read DOES
  153.         "You open the book and glance over the notes. It is really
  154.         a very strange mixture. Something about a tree you shouldn't
  155.         hide under when it rains, 'cause some kind of bugs will start
  156.         falling of its leaves, something else about a certain kind of
  157.         fungus, which grows up among the vines and when eaten is a
  158.         strong tiger repellant and something about how to make a fire
  159.         from wet moss. Here are page after page of useful hints of
  160.         how to survive in the jungle, all in your own hand writing."
  161.     END VERB.
  162. END OBJECT.
  163.  
  164. OBJECT Vine AT Path
  165.     DESCRIPTION
  166.         "A particulary long and thick vine is hanging down just beside
  167.         you."
  168.  
  169.     VERB climb DOES
  170.         "The vine is quite slippery, but you still manage to climb
  171.         well into the trees."
  172.         LOCATE HERO AT Trees.
  173.     END VERB.
  174. END OBJECT.
  175.  
  176. OBJECT Fungus AT Trees
  177.     DESCRIPTION
  178.         "Some kind of vaguely familiar fungus is growing here on a vine."
  179.  
  180.     VERB Take DOES
  181.         LOCATE OBJECT IN inventory.
  182.         "Taken!"
  183.     END VERB.
  184.  
  185.     VERB Drop DOES
  186.         LOCATE OBJECT HERE.
  187.         "The fungus immediately clings to a new vine."
  188.     END VERB.
  189.  
  190.     VERB eat DOES
  191.         "You try a bit of the fungus. It doesn't taste bad although it 
  192.         isn't that delicious either. You swallow the rest of it almost 
  193.         without chewing. After a short while a strange odour starts
  194.         perspiring from your body."
  195.         LOCATE fungus AT nowhere.
  196.         MAKE hero repelling.
  197.     END VERB.
  198. END OBJECT.
  199.  
  200. -----------------------------------------------------------------------------
  201.  
  202. SYNTAX take_inventory = 'inventory'.
  203.  
  204. SYNONYMS i = 'inventory'.
  205.  
  206. VERB take_inventory DOES
  207.     LIST inventory.
  208. END VERB.
  209.  
  210.  
  211. SYNTAX 'look' = 'look'.
  212.  
  213. SYNONYMS l = 'look'.
  214.  
  215. VERB 'look' DOES
  216.     LOOK.
  217. END VERB.
  218.  
  219.  
  220. SYNTAX 'quit' = 'quit'.
  221.  
  222. SYNONYMS q = 'quit'.
  223.  
  224. VERB 'quit' DOES
  225.     QUIT.
  226. END VERB.
  227.  
  228.  
  229. -----------------------------------------------------------------------------
  230. -- NOTE !   It is NOT necessary to declare the actor Hero (which is the
  231. --          player himself). But IF you want to make in possible to give
  232. --          the Hero certain attributes, THEN you have to declare it.
  233.  
  234. ACTOR Hero
  235.    IS NOT repelling.
  236. END ACTOR.
  237.  
  238. -----------------------------------------------------------------------------
  239.  
  240. START AT path.
  241.     "$p'Oh, my head. It hurts. Why am I out here when I've got this kind
  242.     of headache? And where is 'here'? And who am I?'"
  243.  
  244.